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About This Book 

This book contains simple games 
programs to play on a microcomputer. 
They are written for use on ZX8 1, ZX 
Spectrum, BBC, VIC 20, 

TRS-80 and Pet and Apple micros, and 
many are short enough to fit into the 
ZX8 1’s IK of memory. 

Most micros use the language BASIC, 
but they all have their own variations or 
dialects. In this book, the main listing for 
each program works on the ZX8 1 and 
lines which need changing for the other 
computers are marked with symbols and 
printed underneath. The fact that the 
progreuns are written for several micros 
means that they do not make full use of 
each one’s facilities. You could try 
finding ways of meiking the programs 
shorter euid neater for your micro. 

For each game, there are ideas for 
changing and adding to the programs 
and towards the back of the book you 
will find tips and hints on writing games 
of your own. Also in the book is a 
conversion chart to help you adapt 
programs in magazines and other books 
for your micro and a summary of the 
BASIC terms used in this book. 

Typing in the programs 




Lines which need chemging for 
computers other than 2JX8 1 are marked 
with these symbols: 

A VIC and Pet 

★ BBC and Acorn Electron 
■ TRS-80 

• Apple 
s ZX Spectrum 

Every time you see the symbol for the 
micro you are using, look below for the 
corresponding line number with the 
same symbol and type that in instead. 

VIC 20 versions of all except the graphics program should work on 
^ Pet computers. 




Pointsto remember 

1 Type the lines exactly as they are printed 
including all pimctuation and spaces. 

2 Press RETURN, NEWLINE or ENTER 
key at the end of each progrcim line. 

3 Check each line as you go. 

4 Make sure you don’t miss out a line or 
confuse one with another. A piece of paper 
or a ruler is useful to mark your place in 
the listing. 

5 Look out for the symbols and make sure 
you use the correct lines for your 
computer. 

6 If you are using a ZX81 or ZX Spectrum, 
remember not to type the program 
instructions letter by letter but to use the 
special key for each instruction instead. 

You may find it easier to get someone to 
read the program out to you while you 
type it in. Don’t forget to explain that they 
must read every comma, fuUstop, bracket 
and space and differentiate between letter 
“O” and zero, FOR emd 4, and TO and 2. 


Debugging programs 


When you have typed 
in the program, check 
your memual to find out 
how to display it on the 
screen. (Usually you 
type LIST followed by 
the line numbers of the 
section you want to 
see.) 
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*See page 37 for a special note for BBC and Spectrum 


has a mistake in it eind either won’t 
at all or the game won’t work properly. 
Sometimes your computer will give you 
an error code which you can look up in 
the manued. This may help you find the 
mistake, though not always. List the 
program ageiin and check it carefully 
against the book. 

When the game is over, the computer 
will usuaUy say something like BREAK IN 
LINE 200. To play again, you have to type 
RUN. 


Experimenting with the games 

There are suggestions for changing and 
adding to the progreuns throughout the 
book, but don’t be afraid to experiment 
with changes of your own. You can’t 
damage the computer and you can 
always change back to the original if the 
changes don’t work. 

Y ou will probably find you want to 
adjust the speed of some games, * 
especially after you have played them a 
number of times. You will find out which 
line to change on each program page. 

Wherever you see 
PRINT, you can 
cheinge the message 
quotes that follows it 
whatever you like. 

Also, unless you have 
ZX81 with only IK, you 
can add extra 
messages. 

Type a line number (say 105 if you want 
to add a message between lines 100 and 
1 10), then type PRINT, then your 
message inside quotes. 

If your computer cem make colours 
and sounds, you could use your manual 
to find out how they work and try adding 
them to the gaunes in this book. 


Check you have 
typed everything 
correctly. It is easy to 
make mistaikes, so 
expect to find some. Use 
your manual to find out 
how to make chamges to 
the program once it is 
typed in. If in doubt, you 
can always type the line 
again. All the computers 
will replace an existing 
line with a new one with 
the same number. 

Here is a checklist of common 
mistakes to look out for: 

1 Line missed out 

2 Line wrongly numbered 

3 The beginnihg of one line joined onto 
the end of another. 


4 Brackets, commas, colons, semi- 
colons, fuUstops or spaces missed out, 
especially in long, complicated lines. 
Watch for double brackets in particular. 

5 Wrong line used for your computer. 

6 Letter “O” confused with zero. 

7 Wrong numbers used, e.g. extra zeros 
included. 

Playing the games 

To staul the game you must type RUN. In 
some games things happen very quickly, 
so make sure you have read the 
instructions and know what you eire 
supposed to do. 

It is quite likely that the program still 




Robot Missile 


The year is 2582 and the people of Earth are in the 
midst of battle against the Robots. A lethal Robot 
Missile has just landed and everyone is depending 
on you to find the secret code which unlocks its 
defuse r4>echanism. If you fail, the entire Earth 
Commcuid Headquarters will be blown up. 

Your computer knows what the code 
letter is. You must type in your guess and 
it will tell you whether the code letter 
is earlier or later in the alphabet. 

You have four chances to find the 
correct letter before the 
blows up. 







I Line 90 begins a loop which 
' makes lines 100-140 repeat 4 
times. 


Pats your guess in GS. 


Checks if your letter is the 


same as the “secret code” in 
CS. If so computer jumps to 210. 


“EARLIER"* I ^ c;ode letter is 

’ I earlier or later in the 
^ alphabet than yours and 
prints an appropriate 
message. 


"BOOOOOOOOMMM- . . " 

“YOU BLEW IT." 

“THE CORRECT CODE WAS “ ; C^ 


- This prints if all your guesses 
were wrong. 


“TICK. . .FZZZZ. . .CLICK. . . “ 
“YOU DID IT" 

230 STOP 

The above listing wiU work on a ZX81. For 
other computers, make the changes below. 

★a# 80 LET CS=CHR^(64+INT(RND(1)*26+1) ) 
■80 LET C^=CHR^(64+INT(RND(0) »26+l) ) 
sBO LET C^=CHR^(64-»-INT(RND »26-i-l) ) 


End of loop. Goes back for 
next turn. 


- This prints if you guessed 
right. 


/ ^ 


Adding to the program 




You can make the computer print an 
extra message for a correct guess on the 
last go. Change line 220 by adding a 
semicolon to it, like this: 

220 PRINT “YOU DID IT”; 
and add a new line 230: 

230 IF G=5 THEN PRINT “(JUST)” 


Puzzle corner 



See if you can work out how to change 
the program to give you more or less 
chances of guessing the code letter. 






Youarealaser 
communications 
operator. Your 

job is to intercept ^ 

robot messages and relay 
them to Command HQ. A vital 
code message is expected. If you 
relay it correctly, the Robot attack 
will be crushed. 

This game tests your skill at 
remembering a group of 


letters which you 
see for only a very 
short time. The computer 
will ask you for a difficulty 
from 4 to 10. When you have typed 
in your answer, letters will appear 
top left of your screen and disappear 
again fairly quickly. Memorize them 
and then type them into the computer 
and see if you were right. 
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] The Vital Message U 










20 PRINT “VITAL MESSAGE” 

30 PRINT 

40 PRINT “HOW DIFFICULT? (4-10)“ 
50 INPUT D 

60 IF D<4 OR D>10 THEN GOTO 40 


How the program works 

-Clean screen before game starts. 


> 



70 LET M^=“" 


80 FOR 1=1 TO D 
8^BA090 let M^=MS-i-CHRS(INT(RND*26+38) 
100 NEXT I 


AOllO CLS 

120 PRINT “SEND THIS MESSAGE: 
130 PRINT 
140 PRINT M^ 


★■A#150 FOR 1=1 TO D»8 
160 NEXT I 






Asks yon for a “difficnlty number” and 
putsitinD. 

Checks your number isn’t less than 4 
or more than 10. 

Sets up an empty (“null” in computer 
language) string labelled MS in which 
the computer can store the secret 
message. 

Computer loops round D times. Each 
loop it chooses a letter and adds it to 
the string of letten it has already 
chosen and put in MS. 


A#170 CLS- 


180 INPUT NA- 


190 IF N»=M^ THEN GOTO 240- 




Clean screen and then prints the 
message. 

Message stays on screen while 
■ computer loops round, doing nothing, 
for a number of times depending on D. 

r Clean screen when loop has finished. 

• Puts your version of the message in 
NS. 

• Checks if your message is the same as 
the message in MS and jumps to 240 
if it is. 


200 PRINT “YOU GOT IT WRONG” 

210 PRINT "YOU SHOULD HAVE SENT 
220 PRINT M$ 

230 GOTO 260 

240 PRINT "MESSAGE CORRECT” 

250 PRINT “THE WAR IS OVER” 

260 STOP 

The above listing will work on a ZX8 1 . For 
other computers, make the changes below. 

#10,110,170 HOME 
A10,110,170 PRINT CHRA(147) 

★a#90 let Me=MA+CHRe ( I NT (RND ( 1 ) *26+65) ) 
■90 LET MA=MA+CHR*(INT(RND(0)*26+65) ) 
s90 LET Me=M*+CHR* (INT (RND *26+65) ) 

■ A# 150 FOR 1 = 1 TO D*180 
★150 FOR 1=1 TO D*400 


Prints if you are wrong, telling you 
what the message should have been. 


How to make the game harder 

Ton can change the program to include 
nnmben and punctuation marks in the secret 
message. Do this by changing line 90 as follows: 
zx90 LETM$=M$+CHR$(INT(RND*43+21)) 
★a#90 LETM$=M$+CHR$(INT(RND(1)*43+ 48)) 
■90 LETM$=M$+CHR$(INT(RND(0)*43+ 48)) 
*90 LET M$=M$+CHR$(INT(RND *43+48)) 







Shootout 

Yon are standing back to 
back. Yon take 10 paces, turn 
and reach for your gun. How 
quick are you? Can you 
shoot first? 

Your computer prints the 
numbers 1 to 10 to represent 
the 10 paces, pauses and 
^en prints^ DRAWS . . . 

1 must be ready to press 
ly one will do) th< 

on 

enough, youi 
press a key before K 
" ORAWS cdmes'up o^yMfwiU 
^iitakntioaliylbse. 







How to change the 
speed of the game 

Yon can adinst the time you 
have to react to the message 
and press a key by changing 
the last number in line 130. A 
smaller number will give yon 
less time. (For the BBC, 
change the number in 
brackets in line 140.) 





▲•10 CLS 

20 PRINT "COWBOY SHOOTOUT 
30 PRINT "YOU ARE BACK TO BACK" 
40 PRINT "TAKE 10 PACES..." 


50 FOR 1=1 TO 10 
.★60 PRINT I; 


70 NEXT I 


80 PRINT 

★■▲•90 FOR 1=1 TO RND»200 
100 NEXT I 


★▲•110 IF INKEY^O"" THEN GOTO 160 
120 PRINT "HE DRAWS 


★ ■▲•130 FOR 1 = 1 TO 5 
★▲•140 IF INKEY^O"" THEN GOTO 190 
★150 NEXT I 

To 
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AD. 


160 PRINT "AND SHOOTS 

170 PRINT "YOU ARE DEAD 

180 GOTO 210 
190 PRINT "BUT YOU SHOOT FIRST."- 

200 PRINT "YOU KILLED HIM." 

210 STOP 

The above listing will work on a ZX8 1 . For 
other computers, make the changes below. 

•10 HOME 

▲10 PRINT CHRS(147) 

★60 PRINT ; I; 

★ ■▲•65 FOR J=1 TO 300 : NEXT J 
★▲•90 FOR 1 = 1 TO RNDdXlOOO 
■90 FOR 1=1 TO RND(0)tl000 
•110 IF PEEK (-16384) >127 THEN GOTO 160 
▲ 110 GET 1% : IF ISO”” THEN GOTO 160 
★ 110 IF INKEYSd )<>'•" THEN GOTO 160 
•130 FOR 1=1 TO 20 
■ ▲130 FOR 1 = 1 TO 50 
★DELETE 130, 150 

•140 IF PEEK (-16384) >127 THEN GOTO 190 
▲140 GET 1% : IF !▲<>"“ THEN GOTO 190 
★140 IF INKEYe(40)<>"" THEN GOTO 190 


Making the game harder 

If you change the program as follows, you will add 
the possibility of you missing sometimes: 

1) Inline 140, change 190 to 220. 

2) Add these lines: 



s 2X 220 IF RND>.3 THEN GOTO 190 
★▲•220 IF RND(1)>.3 THEN GOTO 190 
■220 IF RND(0)>.3 THEN GOTO 190 
230 PRINT “BUT YOU MISSED” 
240C30T090 




Delay loops can be written 
in one line, as in line 65, for 
allbnttheZXSl. 


How the program works 


This is a loop which sends the 
computer round 10 times to 
print anumber and two dots 

> each time. 

Another loop - this time to 
make the computer delay. 
The computer loops round a 
, number of times depending 
on the value of RND, doing 
nothing. 

Checks you’re not cheating 

> by pressing a key before HE 
DRAWS comes on the screen. 

* Prints the sigxial for you to 
press a key. 

Checks the keyboard to see if 
. you are pressing a key, and 
jumps to 190 if you are. 
(Notice that line 140 is in the 
middle ofaFOR . . . NEXT 
loop. This makes the 
computer check the 
keyboard a number of times 
to ^ve you a reasonable 
chance of pressing a key.) 

, Prints ifyou lose. (Either you 
ran out of time or were 
cheating.) 

- Prints if yon win. 


, An extra delay loop for the 
faster computers. 




Notice how the different^ 
computers check the 
keyboard: Vic uses GET, 
Apple has to PEEK into its ^ 
memory, the others use 
.INKEYS. 


Puzzle corner 

See if you can work out 
how to make it possible ^ 

for the computer to miss 
too. 


Desert Tank Battle 

The last major stronghold of Robot forces outside the U.R.S* is hidden in ancient 
castle ruins in the middle of the desert. A fleet of desert hovertanks has been sent 
to destroy it and you are the commander. Your tank controls the five remaining 

missiles. 

You must assess carefully the direction and elevation before you launch each 
one. Y our computer will aisk you for a direction angle between — 90° (extreme left) 
and +90° (extreme right) and an elevation angle between 0° (along the ground) and 
90° (straight up in the air). The elevation determines the distance the missile will 

travel. 

Is your aim good enough to destroy the robot stronghold? 




How the program works 



40 FOR G=1 TO 5 “I 

50 PRINT "DIRECTION (-90 TO 90) ?” 
60 INPUT T1 

70 PRINT "ELEVATION (O TO 90) ?* 

80 INPUT B c= 

90 LET D1=SIN(2*(B/180*3. 1416) ) 


100 IF ABS(T-T1)<2 AND ABS(D-D1X.05 



Uses your elevation angle to 
calculate the distance your 
missile went. (Answer will be 
between 0 and 1). 

THEN GOTO 220 Ifyour 

direction was within 2 degrees 
and your distance within 0.05, 
then you have hit the castle. 
Program jumps to line 220 to 
tell you so. 


110 PRINT "MISSILE LANDED "; "1 Compares your direction 

120 IF TKT THEN PRINT "TO THE LEFT "; U angle with the number 
130 IF T1>T THEN PRINT "TO THE RIGHT "J chosen in line 20 and prints 

an appropriate message. 

140 IF ABS(Dl-D) >.05 AND TIOT THEN PRINT "AND " ; — Decides 

whether to print “and” by 

A semi-colon at the end of a print statement 
tells the computer notto go to a new line for 
the next item to be printed. 



comparing the distance 
your missile travelled with 
the number chosen in line 30. 


150 IF D-D1>.05 THEN 
160 IF Dl-D>.05 THEN 
170 PRINT 
180 NEXT G 

190 PRINT "DISASTER - 
200 PRINT "RETREAT IN 
210 STOP 
220 PRINT 
230 PRINT 
240 STOP 


PRINT 

PRINT 


FAR 

FAR' 


ENOUGH" 


> Prints a message 
if your shot was 
too long or short. 


YOU FAILED" 
DISGRACE" 


” Prints if you lose. 


"*KAB000MMM*" 
"YOU'VE DONE IT" 


} 


” Prints if you win. 


The above listing will work on a ZX81. For 
other computers, make the changes below. 

★a#20 let T=INT(RND(1)*181)-90 
■20 LET T=INT(RND(0)*181)-90 
★a# 30 LET D=RND(1) 

■ 30 LET D=RND(0) 




Puzzle corner 


Can you work out how to add the 
possibility of the robots seeing you and 
shooting at you before your five goes 
are up? 


United Robot Sta tes 





] 


170 


IS; 


lOO PRINT R*,' 

lO FOR 1=1 TO 12 ~ 
120 LET I*=INKEY* 


The King is waging a fierce and 
bloody battle against his 
deadliest enemy - the Traitor 
Baron. You are one of the King’s 
crack bowmen and at this very 
moment you are crouching 
behind the bushes outside the 
Baron’s Castle, shooting at his 
men as they lift their heads above 
the battlements. 

Your computer will print a row 
containing eight dots and an O. 
The number keys 1 to 9 
correspond to the position of the 0 
in the row. You have a short time 
to press the correct key, and hit 
the O, before it disappears. 

How many of the Baron’s men 
can you hit? 

T 


130 IF VALC 
140 NEXT I 


0"-H^)=T THEN GOTO 


150 PRINT "MISSED" 

160 GOTO 190 
170 PRINT "GOOD SHOT" 
180 LET S=S-H 


190 NEXT 

200 PRINT 
210 STOP 


‘YOU HIT 


•OUT OF 10" 


The above listing will work on a ZX81. For 
other computers, make the changes below. 

■ 50 LET T=INT(RND(0)*9-H) 

#6# 50 LET T=INT(RND(1)*9+1) 

Alio FOR 1 = 1 TO 200 

■ 110 FOR 1 = 1 TO 60 
^•110 FOR 1 = 1 TO 90 

•115 LET !♦="" 

★120 LET IA=INKEYA(1) 

•120 IF PEEK (-16384) >127 THEN GET 
A 120 GET IS 


IS 


Battle at Traitor's 
Castle 


10 PRINT "TRAITOR’S CASTLE 
20 LET S=0 


30 FOR G=1 TO 10 


40 LET RS= 


★■A^50 LET T=INT(RND*9+1) 


60 FOR L=1 TO 9 
70 IF L=T THEN LET RS=RS-*-"0" 
80 IF LOT THEN LET RS=RS+"-" 
90 NEXT L « 






Making the game faster or slower 


You may find that the computer works too quickly 
or too slowly for you in this game. You can adjust 
this by changing the last number in line 110. A 
lower number will make the game faster. 


» Puzzle corner 


How the program works 


Sets your score to zero for 

-start of game. 

- Beginning of loop which 
gives you 10 goes. 

- Sets up an empty string, RS. 

- Selects a number between 1 
and 9 and puts it in T. 

Loops round 9 times, adding a 
character to the string, RS, 

- each time. The character is O 
for the position 
corresponding to the number 
in T and a dot for all the others. 


■ Prints the string. 

Loops round a number of 
-times to see if you are 
pressing a key. (End of loop at 
line 140) 


< Checks if you are pressing 
the right key. Jumps to 170 if so. 


Can you change the program so that you get two 
I kinds of target - either O (one of the Baron’s 
Ordinary soldiers) which is worth 1 point, or S 
(one of his Special branch) which is worth 5 
points? 




Prints if you pressed the 
-wrong key or didn’t press in 
time, then jumps to 190. 


- Increases your score by 1. 

- Sends computer back to line 


30 for another go. 

- Prints your score when 10 
goes are up. 


Notice how the scoring works 
in this program (lines 20 and 
180). You could try adding 
this to other programs. 






Robot Invaders 





You must act quickly. 
Robot invaders of all kinds 
are approaching. You 
have plenty of weapons, 
but for each type of Robot 
you must select exactly 
the right one for it to have 
any effect. 

Code symbols for each 
Robot will flash up on your 
screen. Quickly press the 
key with that symbol on it 
- beware, some need the 
shift key too - and see how 
many Robot invaders you 
can destroy. 
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10 PRINT "ROBOT INVADERS" 
20 LET H=0- 
30 FOR T=1 TO 25 


IA#40 for 1 = 1 
50 NEXT I 


INT(RND»30+20) 


★ ■A#60 LET A=INT(RND»20) 

★ ■A#70 LET D=INT(RND*15) 

s^BA#80 let P^=CHR»(INT(RND*53+11) ). 
AB90 CLS- 


100 FOR J=0 
110 PRINT 
120 NEXT J 


130 PRINT TAB(A);P1i 


r«A#140 FOR 1 = 1 TO 15 
^★a#i50 let R^=INKEY^ 

160 IF R^=P* THEN GOTO 210 
170 IF R^O"" THEN GOTO 190 
180 NEXT I 
190 PRINT "MISSED" 

200 GOTO 230 
210 PRINT "A HIT" 

220 LET H=H+1 


230 NEXT 
A#240 CLS 


250 PRINT "YOU SCORED ";H;"/25"- 
260 STOP 


f 
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How the program works 


- Sets score to zero for start. 

■ Beginning of loop which 
gives yon 25 goes. 


- Random delay. 

Selects numbers for across 
and down positions on 

- screen. 


-Chooses a keyboard character. 
-Clears screen 


Moves cnrsor down the 
screen, one line at a time, 
-until it reaches line numter D 
(which was chosen in line 70). 


-Moves cnrsor A spaces 
across the screen and prints 
the character chosen in line 
80 there. 



-Checks keyboard a nnmber 
of times to see if yon are 
pressing a key, checks if this 
is the right key and then 
jnmps to the appropriate line 
to print hit or miss. 


-Increases score by 1. 

* Goes back for another tnm. 


- Prints score after 25 goes. 










9ve 


listings 


U.For 


■40 FOR 1=1 TO INT(RND(0) *300+200) 
#A«60,70 change RND to RN0<1) 

■60,70 change RND to RND(O) 

★a#80 let P*=CHR* < I NT (RND < 1 ) *58+33) ) 
■80 LET P*=CHR« (INT (RND (O) *58+33) ) 
S80 LET P*=CHR* (INT (RND *58+33) ) 
•90,240 HOME 
490,240 PRINT CHR*(147) 

#■▲•140 FOR 1=1 TO 150 
•145 R*=”" 

★150 R*=INKEY*(1) 

▲150 GET R* 

•150 IF PEEK (-16384) >127 THEN GET R» 


Speeding up the game 






As you get used to playing this 
game, you will probably find 
youwantto speed it up. Do this 
by changing the last number in 
line 140 to a lower one. q 

Moving the cursor ® 
Your computer may have a 
simpler way of moving the 
cursor to a particular point on 
the screen (see lines 100-130). 
Check your manual and see . 


Puzzle corner 
These are 
the most 
dangerous of 
the robots. 


Meehans Tintroids Scrapions 


X Y 

Wireheads Steeleyes 


Can you adjust the program so that you get 100 points for each of these and 
only 10 points for any of the others? 






Secret Weapon 


If you could destroy the main Robot Spare Parts Store, which lies 
underground somewhere in the eastern wastes of the U.R.S., you could 
cripple the robot attack quite severely. 

You have a new secret weapon, as yet unknown to the robots, which 
can cut silently through solid rock, vapourizing everything in its path. 
The Store is very cleverly concealed though. All you can do is aim 
your weapon blindly and hope you get somewhere near the target. 

Your computer will ask you for a difficulty number (the 
smallest number allowed is 4) and then cmk for your 
guesses for the X and Y coordinates of the target. (Enter 
these separately, pressing RETURN, NEWLINE or 
ENTER after each one.) 

For a clue to the possible 
values of X and Y, look 
carefully at the program 
listing. 






How the program works 


20 PRINT “SECRET WEAPON" 

30 PRINT "ENTER DIFFICULTY 
40 INPUT D 

50 IF D<4 THEN GOTO 30 


G^ts a di^ciilty niimber from 
yon, puts it in D and checks it 
is not less than 4. 


★■a#60 let X=INT(RND<D+1 
★■Ae70 LET Y=INT(RNDItD+l 
80 FOR G=1 TO D-»-5 — 


;} 


- Selects numbers for X and Y. 


90 PRINT "GUESSES FOR X AND Y" 
100 INPUT XI 
110 INPUT Y1 


-Beginning of loop which 
gives yon a number of goes 
depending on the diffii^ty 
yon chose. 


-Gets your guesses and puts 
them in XI and Yl. 


- 3 - 


120 LET Z=SQR( (X-X1)*<X-*X1) + (Y-Y1)»<Y“Y1> ) 



-Works out the 
distance between 
your shot and the target and puts 
th.e answer in Z. 


130 IF 2=0 THEN GOTO 200 
140 IF 2<=3 THEN PRINT "CLOSE" 

150 IF Z>3 THEN PRINT "NOT EVEN CLOSE’ 


Checks Z to see how close 
you were and prints a 
- message. (If Z = O you’ve 
won.) 


, -iv 


160 NEXT G 


- End of loop. Goes back for 
next turn. 


170 PRINT "THE ROBOTS HAVE SEEN" 
180 PRINT "YOU ~ AGGHHHHH. . . . . " 


} 


-Prints when you’ve used all 


your goes. 


190 STOP 


200 PRINT "YOU DESTROYED IT IN 
210 PRINT G;" GOES" 

220 STOP 


-Prints if you were successfoLl 


The above listing will work on a ZX81. For 
other computers, make the changes below. 

•to HOME 

A 10 PRINT CHR^(147) 

★a#60 LET X=INT (RND(1)*D+1) 

■60 LET X=INT(RND(0)»D+1) 
★^•70 LET Y=INT<RND(1)»D+1) 

■70 LET Y=INT(RND(0)»D+1) 




Puzzle corner 




Can you work out how to add the 
following scoring system? 

Score 1 point for each time you 
are close. 

Score 10 points for a win. 










Escape! 


The Robots have caught you, taken your weapons andlocked you up. 
Suddenly you remember you still have your sonar wristwatch, which cm^ 
tuned to produce sounds of any frequency. If you can only find the reso™^ 
frequency of your Robot guar^, they should vibrate so much they fall a; 

You must be careful not to use frequencies that are too low or the building 
will vibrate and collapse on top of you. If you go too high, you will get sucha 
terrible headache you will have to give up. 

Can you escape the horrors of the Robot prison? (Look carefully at the 
program for a clue to the range of frequencies to try.) 


A«10 

20 


CLS 

PRINT "ESCAPE" 

LET F=INT(RND* 100+1) 


How the program works 

Chooses a number between 1 
and 100 for frequency of 
robots and puts it in F. 



40 

50 


LET L=ll 
LET H=1J 


Puts 1 in L and H. These are 
used if you go too low or too 
high- see lines 170-190 and 
230-250. 


60 

70 

80 


FOR G=1 TO 5 


PRINT "GUESS? 
INPUT FI 



Beginning of loop which 
allows you to have 5 turns. 

Gets a guess from you and 
putsitinFl. 


90 IF ABS(F-F1)<5 THEN GOTO 290 


Checks if your guess is 
within 5 of F. If it isjumps to 
290 to print YOITVE DONE IT. 


100 IF F-F1>40 THEN GOTO 170 


Jumps to 170 if your guess is 
so low it is less than F by 
more than 40. 


110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 


IF Fl-F>40 THEN GOTO 230 

PRINT "NO VISIBLE EFFECT 
NEXT G 

PRINT "YOU TOOK TOO LONG 
PRINT "THE FREQ- WAS ";F 
STOP 


Jumps to 230 if your guess is 
so high it is more than F by 
more than 40 
Prints if your guess was 
within 40 of F and goes back 
for next turn. If all turns have 
been used, it prints the answer. 


IF L=2 THEN GOTO 210 
PRINT "TOO LOW- - -CAREFUL" 

LET L=2 _ 

GOTO 130 

PRINT "THE BUILDING COLLAPSED" 
STOP - 

IF H=2 THEN GOTO 270 
PRINT "TOO HIGH... OUCH" 

LET H=2 
GOTO 130 

PRINT "YOUR HEAD ACHES - GIVE UP" 
STOP 

PRINT "YOU'VE DONE IT" 

STOP 


Checks the value of L. The 
first time this part of the 
program is reached, L is 1. So 
the computer moves down 
the program to print a 
warning, change L to 2 and go 
back for another turn. 

Next time line 170 comes into 
operation the program jumps 
straight to 210 to teU you 
you’ve lost. 

These lines checkH inthe 
same way to give you a 
warning first time you go too 
high and tell you you’ve lost 
the second time. 


The above listing will work on a 2X8 1 . For 
other computers, make the changes below. 

•10 HOME 

A 10 PRINT CHR4i(147) 

★a#30 let F=INT(RND(1)»100+1> 

18 *30 LET F=INT(RND(0) *100+1) 


Puzzle corner 

The three Robot guards 
each have their own 
resonant frequency. You 
can’t escape until you 
have found aU three. How 
could you change the 
program to do this? 


I 


How to make the 
game harder 

Change the 5 in line 90 to a 
lower number. This means 
you have to get closer to F 
to win. You can also 
increase the possible 
range of F by changing 
100 in line 30 to a higher 
number. 





Pirate Dogfight 

It’s you against the Sky Pirate. He moves ahead, you accelerate - He 
drops behind, you slow down. You must try to get level with him and then 
you can fire, hoping that he won’t be able to fire and hit youfirst. 

Use the letter keys A to accelerate, D to decelerate and F to fire. Your 
computer will tell you your speed and position relative to the pirate. You 
will need to be ready to press the appropriate keys as soon as you press 
RUN. Keep pressing A and D until you get level and then fire. 



A01O 

20 

ifmAmzo 


CLS ^ 

PRINT "PIRATE DOGFIGHT" 
LET V=INT(RND»ll-5) 


Chooses a munber between 
—5 and H-5 for your speed 
relative to pirate and puts it 
inV. 


Chooses a number for your 
distance from the pirate 

★■A#40 LET S=-INT(RND»3-H) ■■■ and puts it in S. This is 

negative at the start, 
which means you 
are behind him. 


50 IF ABS(S)>20 THEN GOTO 230- 
A#60 CLS 

70 PRINT "YOU ARE "; 

80 IF S<0 THEN PRINT "BEHIND" 
90 IF S>0 THEN PRINT "AHEAD" 
100 IF S=0 THEN PRINT "LEVEL" 
110 PRINT "YOU ARE GOING "; 

120 IF V>0 THEN PRINT "FASTER" 
130 IF V<0 THEN PRINT "SLOWER" 
140 IF V=0 THEN PRINT "SAME" 


★a#i50 let IS=INKEY$ 

160 IF I^="A" THEN LET V=V^1 
170 IF I»="D" THEN LET V=V-1 
180 IF I*="F" AND S=0 THEN GOTO 


25 ^ 


Checks if the distance 
between you is more than 20. 
If so, computer jumps to 230 
to say you’ve lost sight of 
him. 


Checks the values of S and V 
and prints your position and 
speed in relation to the pirate. 

Looks to see if you are 
pressing a key and, if so, 
which one. If it is A, your 
speed is increased by 1. If D, 
your speed is decreased by 1. 
if you are pressing F and S= 0 
(Le. you’re level) then it 
jumps to 250. (If S is not 0 
when yon press F then 
nothing happens.) 


20 




190 LET S=S+V 



★■A#200 FOR 1=1 TO 20 
210 NEXT I 
220 GOTO 50 



230 PRINT "YOU LOST SIGHT OF HIM" 
240 GOTO 330 


250 IF ABS(V)<2 THEN GOTO 290 


260 PRINT "YOU ONLY MANAGED 
270 PRINT "SCARE HIM. " 

280 GOTO 40 

★■A#290 if RND>-7 then GOTO 320- 


toT 

J~ 


’} 


300 PRINT "YOU SHOT HIM DOWN" 
310 GOTO 330 

320 PRINT "HE SHOT FIRST" 

330 STOP 

The above listing will work on a ZX81. For 
other computers, make the changes below. 

• 145 

#10,60 HOME iklSO 

A 10, 60 PRINT CHRS(147) #150 

'A'A#30 let V=INT(RND(1)*11-5) A150 

■30 LET V=INT(RND(0>$ll-5) '^■A#200 

★a #40 LET S=-INT(RND( 1)43+1) #290 

■40 LET S=-INT<RND (0)43+1) ^A#290 


Works out the new distance 
between yon. 

Delay loop. 


Goes back to 50 to repeat. 


€k>mes into operation if you 
fired when level. Checks 
speed is less than 2 (ignoring 
+ and signs) and if so, 
jumps to 290. 

Prints a message if speed was 
more than 2 when yon fired. 
Returns to 40 to start again 
with a new value for S. 

Applies a random test to see 
if you fired before the pirate. 

' Prints a message depending 
on the result of the test in 290. 


!♦="“ 

I4=INKEY4(1) 

IF PEEK (-16384) >127 THEN GET 14 
GET 14 

FOR 1=1 TO 200 
IF RND(0)>.7 THEN GOTO 320 
IF RND(1)>.7 THEN GOTO 320 



How to make the game easier 

Y ou may find this game quite difficult. 

To make it slightly easier, add these two 
lines. You will then be able to see the 
relative positions of the two planes 
printed on the screen. 

195 IF ABS(S)>10 THEN GOTO 200 

196 PRINT TAB(w/2);"HIM" 

197 PRINT TAB(S+w/2);”YOU" 

Replace w with the width of your screen. 


Puzzle corner 


The random test in line 290 is loaded in 
your favour. How could you change it so 
your chances of winning are equal? 


21 






Supersonic 
Bomber 


You are on a lone supersonic bombing 
mission over the U.R.S. Your computer 
shows graphs of Robot population based 
on infrared photographs relayed to it by 
satellite. You only have time to attack 
one target in five, so you must quickly 
select the one with the highest 
population of Robots and release one of 
your “Corrodarobe” bombs on it. (These 
contain a substance so corrosive it can 
dissolve a Robot’s body in seconds.) 

To release a bomb, press the number 
key which corresponds to the number 
next to the graph of highest Robot 
population. If there are two the same, 
choose the one with the lowest number. 

Will you be a hero when you return to 
base? 





Amio 

CLS 


20 

PRINT "S 

30 

DIM 

B(5) 

40 

LET 

s 

O 

II 

cn 




50 FOR G=10 TO 1 STEP -1. 


60 LET M=1 


70 FOR 1=1 TO 5 
★■A#aO LET B<I)=INT(RND»10+1) 

90 IF B(I)>B(M) THEN LET M=I 
100 NEXT I j 

A#110 CLS 

120 FOR 1=1 TO 5 
130 PRINT I; 

140 FOR J=1 TO B(I) 

150 PRINT 
160 NEXT J 
170 PRINT 
180 NEXT I 

★■A(^190 FOR 1 = 1 TO G*3 
★I#200 LET I^=INKEY« 

210 IF I*<>"" THEN GOTO 270 
220 NEXT I 

230 PRINT "TOO LATE" 

★■A024O FOR J=1 TO 10 
250 NEXT J 
260 GOTO 280 
270 IF VAL(IS)=M THEN LET S=S+1 
280 NEXT G — — 


How the program works 

This sets ap B as an "array 
variable**. It can hold five 
different values at a time, 
identifying them as B(l), B(2), 
B(3),B(4)andB(5). 

Sets opening score at zero. 

Start of loop for 10 goes. Done 
backwards in this game (Le. 
G=10 for first go, 9 for the 
second and so on). This 
allows the delay loop inline 
190 to give yon more time for 
the earlier goes. 

Sets nnmber of highest 
population graph at 1 to start 
with. 

Chooses 5 numbers and puts 
, them in the array ^1) to B(5). 
Checks which is biggest and 
changes M to correspond 
with it. 


> Prints the 5 numbers on the 
screen in the form of rows of 
stars. 


Checks if you are pressing a 

> key and goes to 270 if you are. 

If yon didn’t press in time, 
prints TOO LATE and goes 
« back for next go. 

Checks if the key yon 
pressed was correct and, if 
■ so, increases yonr score by 1. 

> Goes back for another go. 


290 PRINT "YOU HIT ";S;" OUT OF 10" 

300 PRINT "HIGH DENSITY TARGETS" 

310 IF S=10 THEN PRINT "YOU’RE A HERO" 

320 IF S<10 THEN PRINT "TOUGH - YOU FAILED 
330 STOP 


The above listing will workon a ZX81. For 
other computers, make the changes below. 
•10,110 HOME 
410,110 PRINT CHRS<147) 

★a#80 LET B(I)=INT(RND(1)*10+1) 

• 80 LET B(I)=INT(RND(0)S10-H) 

★ ■A#190 FOR 1 = 1 TO GS30 

Changing the speed of the game 

To give yourself more chance of 
pressing a key each time, change the 
last number in line 190 to a higher one. 

As yonr skill improves, keep 
lowering the nnmber in line 190. How 
low can yon go and still win? 




Prints score after 
10 goes. 


•195 I*="" 

★200 I*=INKEY*(1) 

▲ 200 GET I« 

•200 IF PEEK <-16384) >127 THEN BET 
l▲•240 FOR J=1 TO 400 


IS 



Puzzle corner 


Can you work out how to make the 
computer give you more than 5 targets 
to choose from each time? 



Iceberg 


Your hull is badly damaged and 
you’ve no weapons to speak of. As 
you limp slowly home through 
treacherous iceberg-strewn waters, 
you become aware that an enemy 
ship is tailing you. Strangely it can 
detect you but not the icebergs, so 
your best chance is to lure it into 
hitting one. 

Your computer will print a grid 
showing the position of your ship 
(Y), the enemy (Z) and the icebergs 
You can move one space North, 
South, East or West each go. The 
enemy moves towards you by the 
most direct route (it can move 
diagonally too). If you move into any 
of the 8 positions surrounding the 
enemy, you will be captured, and if 
you hit an iceberg you will sink. 

Can you escape? 






10 PRINT "ICEBERG- 
20 DIM B(8,8) —— 


^▲•30 LET N=INT<RNDt8+4) - 


40 FOR 1=1 TO N 

lA^SO LET B(INT(RND*8+1) , INT(RND$8+1) )=23 I 
60 NEXT I 


^▲•70 LET SX=INT(RND«8'»^1) 

★■A#80 LET SY=INT(RNDt8+l) 

90 IF B(SX,SY)O0 THEN GOTO 70 
le^SAaiOO LET B(SX,SY)=63 


24l 


^■A#110 LET YX=INT(RND«8-M) 

#BA#120 LET YY=INT(RND*8+1) 

130 IF B(YX,YY)00 THEN GOTO 110 
|8#«Aei40 LET B(YX,YY)=62 

AO 150 CLS “ 

160 FOR Y=1 TO 8 
170 FOR X=1 TO 8 
180 IF B(X,Y)=0 THEN GOTO 210 
190 PRINT CHRA(B<X,Y) ) ; 

200 GOTO 220 
210 PRINT 
220 PRINT " 

230 NEXT X 
240 PRINT 

250 NEXT Y . 


How the program works 

This sets up the grid. B is an 

■ “array” with the DIMensions 

8by8. 

- Nia the number of icebergs. 

It varies from 4 to 11 
depending on the value of 
RND. 

> 23 on ZX81 and 42 on the 
other computers is the code 
for *. Computer loops round N 
times putting * into random 
positions in the grid. 

This puts the enemy ship on 

■ the grid for the start of the 
game. 63 (ZX81) and 90 
(others) are the codes for Z. 
Checks the position has not 
already been given to an iceberg 
and finds another if it has. 

> These lines do the same as 
above to put you on the grid. 

(62 and 89 are the codes for 

Y.) 


- Prints out grid with current 
positions of ships and 
icebergs. 




Puzzle corner 

Can you work out how to make the grid 
bigger? 

Now work out how to add more 
ricebergstoo. 


260 LET B(YX,YY)=0' 




270 PRINT -DIRECTION (N,S,E,W) ” 
280 INPUT D% 

'290 LET YY=YY-MDe="S” AND YY<>8> 
1300 LET YY=YY-(De=”N” AND YYOl) 
1310 LET YX=YX-MDe=”E" AND YX08) 
320 LET YX=YX-(De=”W AND YXOl) 


jS^BA#330 IF B(YX,YY)=63 THEN GOTO 50o| 
|a^BA#340 IF B<YX,YY)=23 THEN GOTO 600 


|S'^BA#350 LET B(YX,YY)=62 
360 LET B(SX,SY)=0 


} 


370 LET SX=SX-»-SGN(YX-SX) 
380 LET SY=SY+SGN(YY-SY) 




I S^BA#390 IF B(SX,SY)=62 THEN GOTO 50ol 
•★BAB400 IF B(SX,SY)=23 THEN GOTO 700 


IsABA#410 let B(SX,SY)=63< 


420 GOTO 150' 


- Clean your current position 
from the grid so you can 
specify a new one. 

* Puts your direction in DS. 

Calculates your new 
position, checking that yon 
-don’t go over the edge of the 
grid. 

Checks your new position to 
see if yon have bumped into 

- the enemy ship or an iceberg. 
If yon have, it jumps down the 
program to tell you. 

You’ve moved to a safe 
. position and the code for your 


500 PRINT "YOU'VE BEEN CAUGHT 
510 GOTO 800 
600 PRINT "YOU'VE HIT AN ICEBERG" 

610 GOTO 800 

700 PRINT "YOU'RE SAFE - HE'S HIT ONE" 
800 STOP 

The above listing will work on a ZX81. For 
other computers, make the changes below. 

i^AB30,50,70,80, 110, 120 change RND to RND(l) 
B 30, 50, 70, 80, 110, 120 change RND to RND(O) 
|b#BA# 50,340,400 change 23 to 42 
|^BA#100,330,410 change 63 to 90 
f^BA#140,350,390 change 62 to 89 
A 150 PRINT CHRS(147); 

• 150 HOME 

f290 LET YY=YY-(DS="S 


ship is put there. 

■ Calculates the enemy’s new 
position. 

Checks enemy’s new position 
• to see if he has caught you or 
hit an iceberg. Jumps down 
program to teU you if he has. 

-Enemy’s code is put in the 
new potion. 

- End of a turn. Loops back to 
150 to start another turn. 


Computers can decide 
whether an expression is true ^ 
or false. If the answer is false 
they give it the value 0. If it 
is true, some computers give < 
the value +1, others — 1. 

Lines 290-320 have to be 
changed for some computers { 
^because of this. 


^BA- 


1300 LET YY=YY+(DA="N* 
310 LET YX=YX-(DS="E’ 
320 LET YX=YX+(DS="W" 


AND YY08) 
AND YYOl) 
AND YX08) 
AND YXOl) 
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wall. The stones in it are people, petrified by the Wizard’s angry stare, and, 
what’s more, it can move. If you can break a hole through it with your trusty 
catapults which fling gigantic boulders, you will destroy the Wizard’s 
magic powers and turn the stones back into people again. There are 
problems though - the Wizard is working on a spell which stops missiles in 
mid-air and sends them back where they came from. Sometimes he can 
make it work . . . 

If you don’t succeed, you will become just another stone in the Wizard’s 
Wall!!!! 

A«io CLS 

20 PRINT "WIZARD’S WALL" 

30 PRINT 

40 PRINT "DO YOU WANT ANY HELP?" 

50 INPUT 1% 

★■A»60 IF I*(1)="Y" THEN GOSUB 740 
70 PRINT "DIFFICULTY?" 

80 PRINT "(5=EASY, 1=DIFFICULT) " 

90 INPUT Q 
lOO DIM W(8,8) 

110 DIM E(8) 

120 FOR Y=1 TO 8 
130 FOR X=1 TO 4 
★■^•140 LET W(X,Y)=20 
150 NEXT X 
160 NEXT Y 
170 LET Z=0 
180 FOR C=1 TO 3 
190 LET D=INT(RND*80+21) 

200 GOSUB 430 

210 IF Z=1 THEN GOTO 1150 

220 PRINT "YOU ARE ";D;" YARDS AWAY" 

1^»A«230 LET W=INT(RND*41)-20 

240 IF W=0 THEN PRINT "NO WIND" 

250 IF W<0 THEN PRINT "WIND TO RIGHT" 

260 IF W>0 THEN PRINT "WIND TO LEFT": 

270 PRINT "GIVE ELEVATION (1-90)" 

280 INPUT A 
290 PRINT "GIVE SPEED" 








^ 300 INPUT V 

310 LET A=A/180*3. 1416 

320 LET H=TAN(A)*(D-W)-(5*(D-W)'^2) / (V*C0S(A) )^2 
330 LET H=INT(H/Q) 

340 IF H>0 AND H<9 THEN GOSUB 540 

350 IF H<1 THEN PRINT "SHOT WAS TOO NEAR" 

360 IF H>8 THEN PRINT "SHOT WAS TOO FAR" 

★■a«370 if RND>.2 then GOTO 200 

380 PRINT "THE WALL HAS MOVED " 

390 NEXT C 

400 PRINT "YOU HAVE BEEN TURNED" 

410 PRINT "INTO STONE" 

420 STOP 

★■a#430 for 1=1 TO 30 
440 NEXT I 
a#450 CLS 
460 PRINT 

470 FOR Y=8 TO 1 STEP -1 
480 FOR X=1 TO 8 
★■a#490 print CHR*(W(X, Y) ) ; 

500 NEXT X 

510 PRINT 

520 NEXT Y 

530 RETURN 

540 GOSUB 650 

550 LET W(E(H)-1,H)=0 

560 IF V*C0S(A)>50 THEN LET W (E (H) -2, H) =0 
★■a«570 if RND>.5 and HOI THEN LET W(E(1),1>=29 
★■A* 580 IF RND>.5 AND H>5 AND H<8 THEN LET 
W(E(H+1)-1,H+1)=0 
590 IF H>1 THEN GOTO 630 
600 FOR Y=2 TO 8 

★■A#610 IF RND<.5 THEN LET W (E ( Y) -1 , Y) =0 
620 NEXT Y 
630 GOSUB 650 
640 RETURN 
650 FOR Y=1 TO 8 
660 LET X=1 

670 IF W(X,Y)=0 OR X=8 THEN GOTO 700 

680 LET X=X+1 

690 GOTO 670 

700 LET E(Y)=X 

710 IF X=1 THEN LET Z=1 
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The Wizard's 
720 NEXT Y 
730 RETURN 
740 PRINT 
750 PRINT 
760 PRINT 
770 PRINT 
780 PRINT 
790 PRINT 
800 PRINT 
810 PRINT 
820 PRINT 
830 PRINT 
840 PRINT 
850 PRINT 
860 PRINT 
870 PRINT 
880 PRINT 
890 PRINT 
900 PRINT 
910 PRINT 
920 GOSUB 
930 PRINT 
940 PRINT 
950 PRINT 
960 PRINT 
970 PRINT 
980 PRINT 
990 PRINT 
1000 PRINT 


Wall continued 


1010 PRINT 
1020 PRINT 
1030 PRINT 
1040 PRINT 
1050 PRINT 
1060 PRINT 
1070 PRINT 
1080 PRINT 
1090 GOSUB 


'YOU ARE ATTACKING THE" 
■LAST STRONGHOLD OF THE" 
■NOTORIOUS WIZARD, WHO" 

■IS HIDDEN BEHIND AN" 
■ENDLESS STONE WALL, " 

■EACH STONE BEING ONE" 

■OF HIS FORMER VICTIMS." 
■ONLY YOU CAN ATTACK, " 

■AND FREE THEM FROM" 

■HIS MAGIC." 

■YOU MUST DESTROY THE" 

■WALL USING CATAPULTS, " 

■BUT BEWARE, THE WIZARD" 
■HAS THE POWER TO MOVE" 

■THE WALL BACK AND" 

■FORTH, AND OCCASIONALLY, " 
■TO DEFLECT YOUR SHOTS" 
■BACK AT YOU. " 

.110 

■AFTER EACH SHOT, YOU ARE" 
■SHOWN A CROSS-SECTION" 

■OF THE WALL, SHOWING” 

■HOW MUCH DAMAGE THERE” 

■IS. " 

•NOTE THERE ARE CERTAIN” 
•KEY STONES THAT PRODUCE” 
"LOTS OF DAMAGE, AND” 
"ALSO, THE FASTER THE" 
"BOULDER IS MOVING" 
"HORIZONTALLY, THE MORE” 
"DAMAGE IT WILL CAUSE. ” 
••CAN YOU DEFEAT THE” 
"WIZARD IN TIME TO SAVE” 
••THE THOUSANDS OF TRAPPED •• 
"SOULS " 

1110 




1100 
1110 
★ ▲•1120 
▲•1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 


RETURN 

PRINT "PRESS A KEY 

IF INKEY*="" THEN GOTO 1120 

CLS 

RETURN 

PRINT "YOU MANAGED TO BREAK" 
PRINT "A HOLE IN THE WIZARD’S 
PRINT "WALL - YOU HAVE BEATEN 
PRINT "HIS MAGIC POWERS, AND" 
PRINT "FREED HIS VICTIMS. " 
STOP 


The above listing will work on a ZX81. For 
other computers, make the changes below. 


■all RND to RND(O) 

★▲•all RND to RND<1) 

•10,450,1130 HOME 
A 10, 450, 1130 PRINT CHR*(147); 

★■▲•60 IF LEFT»(I», 1)="Y" THEN GOSUB 740 
★■▲•140 LET W(X,Y)=29 
■▲•430 FOR 1=1 TO 200 
★430 FOR 1=1 TO lOOO 
★■▲•490 PRINT CHR*(W(X, Y)+32) ; 

★1120 IS=GET* 

•1120 GET 

A1120 GET : IF !•="" THEN GOTO 1120 


Changes you can make to the game 


You can make the wall thicker by changing the following lines: 

Line 100: change the first number to a higher one, say, 10. 

Line 130: subtract 4 from the number you used in line 100 and put the 
answer at the end of line 120. (i.e. in this case use 6.) 

Line 480: change the last number to the number you used in line 100(10 
again in this case). 

If you make the wall much thicker, you will probably need more time. 
Change the last number in line 180 to a higher number to do this. 




Missile! 

This game is different from the 
others in this book because it uses 
graphics. As the computers vary so 
much in the way their graphics 
work, there is a separate program 
for each one. Read the in:: tructions 
on this page for how to play the 
game and then look through the 
pages that follow for the version for 
your computer. 



How to play Missile! 

You have three missile bases, each 
capable of launching one missile. 
When you see a plane approaching, 
you must judge its height and speed 
and fire your missiles at it one by 
one. 

Your missiles are launched by 
pressing any key. The first time you 
press launches the left-hand one, 
second time the middle one and 
third time the right-hand one. 

See how many enemy planes you 
can shoot down. 


Missile! : TRS-80 version 

10 CLS 

20 DIM Y(3) ,F(3) 

30 N=1 

40 PS=INT(RND<0)*3+1) 

50 P=INT(RND(0)*36+5) 

60 GOSUB 400 
70 FOR I=PS TO 100 STEP 
80 GOSUB 300 
90 FS= INKEY* 

100 IF F*="" 

110 F(N)=1 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
300 
310 


320 RETURN 
400 FOR J=1 TO 3 
410 SET (J*32,47) 
420 SET (J*32+l,47) 
430 NEXT 
440 RETURN 


THEN 230 


(I-PS+1,P) 


PS 


OR N>3 THEN 130 


N=N+1 

FOR J=1 TO 3 
RESET ( 32* J , 46-Y ( J ) > 

IF F(J)=0 OR Y(J)>45 THEN 190 
Y(J)=Y(J)+1 

IF POINT (32*J, 46-Y (J) ) 

SET ( 32* J , 46-Y ( J ) ) 

NEXT 
NEXT 
PRINT 
END 
PRINT 
END 
RESET 


@0, "MISSED" 

o 

@0, "HIT! I ! " 
(I-PS,P) : RESET 


SET (I,P) : SET (I+1,P) 


Missile!: BBC version 


lO MODE 5 

20 VDU 23, ?24, 224, 160, 144, 144, 143, 128, 128,255 
30 VDU 23,225,0,0,0,0,240,12,2,255 
40 VDU 23,226,16,56,84,16,16,16,0,0 
50 VDU 23,227,0,0,0,8,8,8,8.60 
60 DIM Y(3) ,F(3) 

70 N=1;MS=16 

80 PS=RND<20)+10 

90 P=RND(500)+400 

100 PROCDISPLAY 

no FOR I=PS TO IlOO STEP PS 

120 PR0CPLANE(I-PS,P,0) i PROCPLANE ( I , P, 3) 

130 F*=INKEY»(0) 

140 IF F*="" OR N>3 THEN 170 

150 F(N)=TRUE 

160 N=N+1 

170 FOR J=1 TO 3 

180 IF NOT F(J> THEN 240 

190 PR0CMISSILE(J,0) 

200 Y<J)=Y<J)+MS 

210 IF Y(JX1024 THEN PROCMISSILE ( J , 3) 

220 X=J*320-I ; Y=Y(J)+32-P 

230 IF X<128 AND X>-40 AND Y>-32 AND Y<2 THEN 280 
240 NEXT 
250 NEXT 

260 CLS : PRINT "MISSED!!!!" 

270 END 

280 PROCPLANE ( I, P, 1) : SOUND 0,-15,5,20 

290 END 

300 DEF PROCPLANE(X, Y,C) 

310 GCOL 0,C 
320 MOVE X,Y 
330 VDU 5,224,225,4 
340 ENDPROC 

350 DEF PROCMISSILE (N,C) 

360 GCOL 0,C 

370 MOVE 320*N,32+Y(N) 

380 VDU 5,226,4 q 

390 ENDPROC 

400 DEF PROCDISPLAY 

410 FOR 1=1 TO 3 

420 MOVE 1*320,32 

430 VDU 5,227,8,226,4 

440 NEXT 

450 ENDPROC . I 


Missile! : ZX Spectrum version 


460 FOR j=l TO 3 
470 PRINT AT 21 , 8* j ; *• C AB3 ' 
480 NEXT j 
490 RETURN 

500 DATA 0,0,0,0,255,255, 
127,63 

510 DATA 0,252,252,252, 
255,255,254,252 


10 CLS 

15 INVERSE O 
20 DIM y<3) 

30 DIM T (3) 

40 LET n=l 
50 LET ms=8 
60 LET ps=INT(RND»64-5) 

70 LET p=INT(RND*140+20) 

80 60SUB 400 
90 FOR i=ps TO 240 STEP ps 
lOO LET c=l : LET x=i— ps 
110 GOSUB 300 
120 LET c=0 I LET x=i 
130 GOSUB 300 
140 LET f*= INKEYS 

150 IF fS=”" OR n>3 THEN GOTO 170 
160 LET f<n)=l i LET n=n+l 
170 FOR j=l TO 3 
180 LET c=l : GOSUB 350 

190 IF f(j)=0 OR y<j)>148 THEN GOTO 240 

200 LET y ( j ) =y ( j ) +ms 

210 LET c=0 : GOSUB 350 

220 LET x=j*64— i : LET y=p—y(j) 

230 IF x>-l AND x<12 AND y<10 AND y>-5 THEN GOTO 280 
240 NEXT j 
250 NEXT i 

260 PRINT AT O, O; "Mi ssed” 

270 STOP 

280 PRINT AT 0,0;"Hit!!!“ 

290 STOP 
300 INVERSE c 
310 PLOT x,p 

320 DRAW 0,8 s DRAW 3,-6 

330 DRAW 8,0 : DRAW 2,-2 

340 DRAW -13,0 s RETURN 

350 INVERSE c 

360 PLOT 64*j+4, Y(j )+4 

370 DRAW 0,6 s DRAW -2,-2 

380 DRAW 2,2 s DRAW 2,-2 

390 RETURN 

400 FOR a=65 TO 66 

410 FOR b=0 TO 7 

420 READ c 

430 POKE USR CHRS ( a > -t-b , c 
440 NEXT b 

450 NEXT a 


Missile! : VIC 20 version 

10 PRINT CHR*(147)CHR*(5) ; 

20 POKE 36879,8 
60 DIM Y(3),F(3) 

70 N=1:MS=2 

90 P=INT(RND(l)*9+2)*2 

110 FDR 1=1 TO 21 STEP RND(l)/2+.5 

120 GOSUB 300 

130 GET F$ 

140 IF F*="" OR N>3 THEN 170 
150 F(N)=-1 
160 N=N+1 



170 FOR J=1 TO 3 

180 IF F(J)=0 THEN 220 

190 POKE 8164+J*5-Y(J)*22,32 

200 IF Y(J)=22 THEN 240 » 

210 Y(J)=Y<J)+1 

220 POKE 8164+J*5-Y(J) »22,30 

230 IF ABS(I-J*5X = 1 AND P=Y(J) THEN 280 

240 NEXT 

250 NEXT 

260 PRINT CHR*< 147) ; "MISSED! !!! " 

270 END 

280 PRINT CHR<(147> ; "HIT! ! ! ! " 

282 POKE 36877,220 : POKE 36878,15 

284 FOR K=1 TO 500 : NEXT 
286 POKE 36877,0 s POKE 36878,0 
290 END 

300 POKE 8163+I-P*22,32 
310 POKE 8164+I-P*22, 121 
320 RETURN 


Special note for Spectrum users: 

The convention used for showing graphics 
characters in a PRINT statement is as follows: 
The character C means press the GRAPHICS 
key once- Then type the following letter 
keys (shifted for the ZX81). Press the 
GRAPHICS key again when 1 is shown. 





Missile! : Apple version 


lO HOME 
20 HGR 
30 HCOLOR=3 
40 DIM Y <3) ,F (3) 

50 N=1 ; MS=5 
60 PS=INT(RND(l)*6+4) 

70 P=INT(RND(1)*135+11) 

80 GOSUB 400 

90 FOR I=PS TO 265 STEP PS 

lOO X=I-PS : Y=159-P : C=0 : GOSUB 300 

110 X=I : C=3 : GOSUB 300 

120 F$="“ : IF PEEK (-16384) >127 THEN GET F$ 

130 IF FS="" OR N>3 THEN 160 

140 F(N)=1 

150 N=N+1 

160 FOR J=1 TO 3 

170 C=0 : GOSUB 350 

180 IF F(J)=0 OR Y(J)>145 THEN 230 
190 Y(J)=Y(J)+MS 
200 C=3 : GOSUB 350 
210 X=J*70-I : Y=P-Y(J) 

220 IF X>-1 AND X<15 AND Y>-9 AND Y<5 THEN 270 
230 NEXT 
240 NEXT 

250 VTAB 22 : PRINT "MISSED” 

260 END 

270 VTAB 22 : PRINT "HIT!!!” 

280 END 

300 HCOLOR=C 

310 HPLOT X,Y TO X,Y-8 

320 HPLOT TO X+3,Y-2 : HPLOT TO X+12,Y-2 
330 HPLOT TO X+14,Y : HPLOT TO X,Y 
340 RETURN 
350 HCOLOR=C 

360 HPLOT 70*J, 158-Y(J) TO 70*J , 154-Y ( J ) 

370 RETURN 

400 FOR J=1 TO 3 

410 HPLOT 70*J-5, 159 TO 70* J +5, 159 
420 NEXT 
430 RETURN 
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Missile! : ZX81 version 


10 CLS 
20 DIM Y(3) 

30 DIM F(3) 

40 LET N=1 

50 LET P=INT(RND*19+2)*2 
60 FOR 1=1 TO 48 
70 PLOT I,P 

80 PLOT I+1,P ■ 

90 UNPLOT I-1,P 
100 LET B$= INKEY* 

no IF B*='*" OR N>3 THEN 60T0 140 
120 LET F(N)=1 
130 LET N=N+1 
140 FOR J=1 TO 3 
150 IF F(J)=0 THEN SOTO 190 
160 UNPLOT J*16,Y(J) 

170 IF Y(J)=42 THEN GOTO 210 
180 LET Y(J)=Y(J)+1 
190 PLOT J*16,Y(J) 

200 IF P=Y(J) AND (J*16=I OR J*16=I+1) 
THEN GOTO 260 
210 NEXT J 
220 NEXT I 
230 CLS 

240 PRINT "MISSED" 

250 STOP 
260 CLS 

270 PRINT "HIT" 

280 STOP 
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Adding to the programs 


Here are some ideas for additions 
you can make to the programs in 
this book or to your own programs. 

In most cases you won’t be able to 
add these to a ZX81 with only IK as 
the games themselves fill almost all 
its memory space, but you should 
find there is plenty of room on the 
other computers. 

Remember you will either have to 
restrict your additions to the spare 
line numbers in a program or 
renumber the program. If you 
decide to renumber, take care you 
change all the GOTO and GOSUB 
lines too. 

■ 

Getting the computer to tell you 
how to play 

You can add a 
section to any 
program to make 
the computer print 
instructions telling 
you what to do. The 
easiest way to do 
this is to add some lines, such as those 
below, at the beginning of the 
program and then put a sub-routine at 
the end. 



Making the computer 
stop and wait for you YcoMtioJ\ 

uPi 

If your instructions are very long, you 
may want to insert this sub-routine 
which stops the program miming at a 
particular point until you press a key. 
This way you can stop the instmctions 
scrolling off the top of the screen 
before you have read them. Put a 
GOSUB line at the place you want the 
program to stop and then put this sub- 
routine at the end. 

lOOO PRINT “PRESS A KEY TO CONTINUE 
SZXIOIO IF INKEY*=“" THEN GOTO lOlO 
★1010 I*=GET* 



•lOlO GET I« 
AlOlO GET I* 
1020 PRINT 
1030 RETURN 


IF I*=“" THEN GOTO 1010 


Making the computer "talk" to 
you 



10 PRINT "TITLE OF GAME" 

11 PRINT "DO YOU WANT TO" 

12 PRINT "KNOW HOW TO PLAY?" 

15 INPUT I* 

SZX17 IF I«(1>="Y" THEN GOSUB lOOO 
★■▲•17 IF LEFT*<I*, 1)="Y" THEN GOSUB lOOO 

main program goes here 


You can make the computer ask you 
questions and react to your answers. 

For instance, here is an addition which 
wiU make the computer refuse to play 
with you unless your name begins with J. 
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lOOO PRINT "WHAT YOU HAVE TO" 

lOlO PRINT "DO IS " 

1999 RETURN 

You can add as many print statements 
as you like for the instmctions, just 
remember to put a number and the ^ 
word PRINT at the beginning of each ★• 


1 PRINT "WHAT IS YOUR NAME?" 

2 INPUT I* 

3 IF I*<1)0"J" THEN GOTO lOOO 

3 IF LEFT*<I*, 1X>"J" THEN GOTO lOOO 

4 PRINT "OK-YOU CAN PLAY." 

5 PRINT “ARE YOU READY?" 

6 INPUT J* 

7 IF J*<1)0"Y“ THEN GOTO 5 

17 IF LEFT*(J*, 1)0"Y" THEN GOTO 5 


one. Restrict the length of the part 
inside the quotation marks to the 
number of characters your computer 
Cem print on one line. Don’t forget to 
put a RETURN line at the end or the 
progrcun won’t work. 


main program here 

lOOO PRINT "SORRY THIS GAME IS 
lOlO PRINT “ONLY FOR PEOPLE" 
1020 PRINT “WHOSE NAMES BEGIN" 
1030 PRINT “WITH J" 





Here is another one where the 
computer dares you to be brave 
enough to play. 

10 PRINT "VERY SCAREY GAME" 

12 PRINT "ARE YOU BRAVE ENOUGH" 

14 PRINT "TO TACKLE THE GREEN" 

15 PRINT "HAIRY MONSTER?" 

16 INPUT I* 

S ZX17 IF I*(1)="Y" THEN GOTO 20 
Ma017 if left*<i*, i)="Y“ then goto 20 

IB PRINT "COWARD" 

19 STOP 


cases you can add a single line to your 
progreun at the place you want the 
sound. In others, you need several 
lines and it is best to put these in as a 
sub-routine. 

As an example, here is the sound of 
a shot for the BBC. You can experiment 
with where to put it in the program, but 
you must give it a line number to make 
it work: 

SOUND 0,-15, 5, lO 

At the back of the VIC memual you 
will find some useful sub-routines for 
sounds such as “laser beeun”, 
“explosion” and “red alert”. Put a 
GOSUB line where you want the sound 
to appear, number the sub-routine and 
add a RETURN at the end of it. 


Y ou could combine this with the 
instruction sub-routine by taking lines 
1 1 to 17 from the instructions section 
on this page and putting them at lines 
20 to 26 of this program. You can then 
start the main program at line 30 and 
add the instruction sub- routine at the 
end. 


Would you like another go? 

Instead of typing RUN each time you 
play a game, you can make the 
computer ask you if you’d like another 
go. Put these lines at the end of the 
program, just before the last STOP 
statement. 


lOOO PRINT "DO YOU WANT ANOTHER GO?" 
lOlO INPUT I* 

SZX1020 IF I»<1)="Y" THEN RUN 

^■a*io20 if left*(i*, i)="Y" then run 

1030 PRINT "OK THEN - BYE" 

1040 STOP 



Change line 
numbers according 
to your program. 

Adding sound effects 


The BBC, VIC 20, ZX Spectrum emd 
some Apples are able to produce 
sounds and you can add lines to your 
programs to make them do so at 
appropriate places. You could add an 
explosion for instance, or a little tune 
which plays if you win. All the 
computers need different instructions 
to make sounds though, so you will 
have to look at your manual. In some 



Special note for BBC and 
Spectrum users ^ 

If you have a BBC or a ZX Spectrum 
you may find that some of the games 
in this book run too fast for you. You 
will find a box next to these games 
containing instructions for 
changing the speed. Remember, to 
slow the game up you always need 
to use a higher number. Later 
models of the BBC may run up to 
twice as fast as the earlier models, 
and this could make the gcunes 
appear impossible on the first run. 
Be prepared to make big changes 
to the speed number to correct this. 



Writing your own programs 


As you work through the games in 
the book, you will probably find 
yourself making more and more 
changes to them and eventually 
wanting to write new games of your 
own. On these two pages you will 
find some hints on how to set about 
doing this. 





*It can tell you the results of its 
calculations and decisions and also 
what is stored in its memory. 


‘Provided you use its language 
correctly, it can do only exactly whax 
you tell it, even if it is silly. 

Remember, when you are trying to 
work out a game, notto include 
anything which your computer won’t 
be able to do. 


Before you start, it is a good idea to 
stop and think about what your 
computer can and cannot do. 


‘It can ask you for information. 


‘It can store information 


‘It can do calculations. 


‘It caimot do anything unless you tell it 
to. 


‘It can make decisions by comparing 
items of information in various ways. 


‘It can select numbers at random by 
using RND. 









Planning a game 


Writing the program 


Before you can teU the computer how 
to play your game, you must know 
exactly how to play it and what the 
rules are yourself. The computer will 
need a series of simple logical 
instructions, so work out your game in 
your head or on paper first and then 
break it down into simple steps. 

Next write a plan (in English - don’t 
try to use BASIC yet) of all the stages of 
the game in order. 

Here is a plan for a simple shooting 
game, such as firing cannon balls at a 
pirate ship or shooting laser beams at 
an alien invader, to give you an idea. 

PLAN 

Pfi/NT TITLE AND 
INSTRUCnoSJS 

2) CHOOSE A TARGET 
FOR THIS GAME 

3) BECilN A LOOP TO I 
CilVE THE player 

N COES / 

4-) CET A SHOT FROM 

THE Player 

5) CHECF. IF SHOT WAS 

ON TAROEJ 

6) PRINT message 
DEPENPINC ON 

Accuracy of shot 

l) <iO 6ACK FOR 
ANOTHER qo IF SHOT 
WAS UNSUCCESSFUL ^ 


The next stage is to convert yoior plan 
into BASIC. Each step in your plan may 
need several lines in BASIC. Don’t 
forget to leave gaps when numbering 
your program lines so you can go back 
and add extra ones if you need to. 

Do a first draft of the program on 
paper first and then start testing on the 
computer. Your computer will spot 
errors much more quickly than you 
will see them yourself emd may give 
you a clue as to what is wrong. 
Remember that debugging programs 
is a long, tedious process even for 
expert programmers, so don’t expect 
to get yours right first time. 



Once you have got the core of the 
program working, you can add to it. 

Scoring, extra comments, more 
targets etc. can cdl be incorporated 
later. You could add sections from the 
programs in this book to your games. 

Don’t expect to be able to write 
exciting and original games straight 
away. Keep your ideas very simple 
and be prepared to,adapt them as you 
go along. You may find you have 
included something in your game 
which is easy for humans to do but 
very difficult for a computer. As you 
get more experienced you will begin 
to know instinctively what your 
computer can do and find it easier to 
write programs for it. 39 




Summary of BASIC 

This section lists some common BASIC words and describes what they 
make the computer do and how they are used. Most of them have been used 
in the programs in this book, so you can check back through the book to see 
how they work in a game. Not all the words can be used on all the 
computers mentioned iii this book. The conversion chart on page 46 shows 
what you can use instead. 



LET tells the computer to label a section of its 
memory and put a particular Vcdue in it e.g. LET 
A= 6 meems leibel a section of memory “A” and put 
the value 6 in it. “A” is called a “variable” and putting 
something in it is called “cissigning a value to a 
variable”. 

Some variable labels are followed by a dollar 
sign e.g. A$. This means they are for “strings”, 
which can contain any number of characters, 
including letters, numbers and symbols. 



PRINT tells the computer to display things on the 
screen and you can use it in severed ways: 

A message enclosed in quotation marks with 
PRINT in front of it will be displayed on the screen 
exactly as you typed it. The section inside quotes 
does not have to be in BASIC, it can be anything you 
like. 

PRINT followed by a variable label e.g. PRINT A 
or PRINT A$ tells the computer to display the 
contents of that variable on the screen. 

PRINT can edso do calculations and then display 
results e.g. PRINT 6*4 will make the computer 
24. 

You Cem use PRINT by itself to leave cm empty 
line. 


RND tells the computer to choose a number at 
random. Different computers use different forms of 
RND and you cem see what these are in the 
conversion chart on page 46. On Sincleur computers 
by itself produces a number between 0 and 
You can vary the limits of the number it 
by multiplying RND and adding to it. E.g. 
RND *20 produces a number between 0 and 
19.99999999, while RND*20+ 1 produces a number 
between 1 and 20.99999999. 

See INT for how to produce ordy whole numbers. 

See CHR$ for how to produce letters and other 
keyboard characters at random. 





INT is short for integer, which means whole 
number. For positive numbers, it tells the computer 
to ignore everything to the right of the decimal 
point. E.g. INT(20.999) is 20. For negative numbers, 
it ignores everything to the right of the decimal 
point and “increases” the number to the left of it by 
one e.g. INT(-3.6) is -4. 

INT is often used with RND, like this: 

INT(RND*20 +1) which tells the computer you want 
it to choose a whole number between 1 and 20. 


CHR$ converts numbers into letters. Apart from the 
ZX8 1 , all the computers in this book use the 
ASCII* set of keyboard characters in which each 
cheiracter corresponds to a certain number. E.g. 
letter A has the code number 65 and PRINT 
CHR$(65) will display an A on the screen. 

You can use CHR$ with INT and RND to make the 
computer select random letters, like this: 

CHR$(INT(RND * 26 + 65)) 

This line will produce random letters on a ZX 
Spectrum (see conversion chart for other 
computers). 




FOR is used to start a “loop” which will make the 
computer repeat part of a program a certain 
number of times. It must be followed by a variable 
(such as G to stand for the number of goes allowed 
in a game), and the variable must be given start and 
end values (such as 1 TO 10.) 

The end of the loop is marked by a NEXT line 
(NEXT G in this example) which increases the value 
of the variable by 1 each time and then sends the 
computer back to the FOR line again. When the 
vari^le reaches its end value, the computer 
ignores the NEXT line and carries on to the line 
which follows it. Every FOR must have a NEXT or 
you will get a bug. 


V 


INPUT labels a space in the computer’s memory, 
prints a question mark and then waits for you to 
type something which it cam put in this memory 
space. It will not carry on with the rest of the 
program until you press RETURN, ENTER or 
NEWLINE. 

You can use number or string variables with 
INPUT, but if you use a number variadjle the 
computer will not accept letters from you. 



* American Standard Code for Information Interchange (see page 45) 
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INKEY$ checks the keyboard to see if a key is 
being pressed and if so which one. It does not wait 
for you to press a key like INPUT does. It is usually 
used in a loop which makes the computer go round 
checking the keyboard lots of times. This is 
because computers work so quickly, you wouldn’t 
have a chance of pressing a key in the time it takes 
the computer to do one check. 

If you haven’t pressed a key before the loop 
finishes, the computer carries on with a string 
containing nothing (called a “null” string). 

NB Apple and VIC do not use INKEY$. 


GET is used instead of INKEY$ on VIC and Pet 
computers. 


GOTO makes the computer jump up or down the 
program ignoring the lines in between. You must 
put the number of the line you want it to jump to 
after the GOTO instruction. 


GOSUB tells the computer to leave the main 
program and go to a sub-routine. GOSUB must be 
folowed by the number of the first line of the sub- 
routine. At the end of the sub-routine you must have 
a RETURN line. This sends the computer back to 
the main program to the line immediately following 
the GOSUB line. A GOSUB without a RETURN in a 
program will give a bug. 



IF . . . THEN tells the computer to decide if an 
expression is true or false, and do different things 
depending on the answer. It is used with the 
following signs, and also with AND or OR: 

=the same as 
< less than 
>greaterthan 
< = less than or the Seime as 
> = greater than or the same as 
onot the saune as 

If the computer decides an expression is true, it 
carries on to do the instruction which follows 
THEN. If it decides it is false, it ignores the rest of 
that line and goes on to the next one. 
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CLS is used to clear everything off the screen 
without removing or changing anything in the 
memory. It is useful for removing the listing from 
the screen at the beginning of a RUN or in games 
when you want the player to react to something 
seen for a limited amount of time. (NB Apple and 
VIC do not use CLS - see conversion chart). 




HOME is used by Apple computers instead of CLS 
to clear the screen. 


ABS ignores plus and minus signs in front of 
numbers and takes their “absolute” values. E.g. 


ABS( - 10) is 10 and ABS( + 10) is also 10. 


VAL takes the numeric value of numbers written as 
strings. In effect, it tells the computer to ignore the 
dollar sign and treat the string as an ordinary 
number variable. E.g. if I$=“60” then VAL(I$) is the 
number 60. 





ASC converts a chcuracter into its ASCII code 
number e.g. ASC(“3”) gives 51. The expression in 
brackets must be a string e.g. ASC(A$) or 
ASC(“20”). 

NB ZX81 and ZX Spectrum do not use ASC, though 
the Spectrum does use the ASCII code. 


CODE is used by ZX8 1 and Spectrum in place of 
ASC. Like ASC it must always be followed by a 
string. Remember that the ZX81 uses different code 
numbers from the other computers. 



TAB moves the cursor across the screen to a 
specified column number. It is usually used with 
PRINT to display something in the middle of the 
screen. The number of spaces you want the cursor 
moved is put in brackets after TAB. The maximum 
number you can use depends on the screen width 
of your computer. 




SGN tells the computer to find out the sign of a 
number. It produces - 1 for a negative number, 0 
for zero and + 1 for positive numbers. E.g. 
SGN(-30) is - 1, SGN(7) is + 1 and SGN(O) isO. 



DIM tells the computer how much memory space 
will be needed for an “array” (a row or a grid). E.g. 
DIM X(6) tells the computer to set aside an area 
large enough to contain a row of 6 elements and 
labelled X. DIM A(8,8) means a memory space 
labelled A and big enough to take 8 elements 
across and 8 down is needed. The number of 
elements of data used in the program must 
correspond to the numbers in brackets after DIM 
or you will get a bug. 


SQR takes square roots of numbers. E.g. SQR( 16) 
gives the answer 4. 


SIN calculates the sine of an angle. In aright-angled 
triangle the length of the side opposite an angle, 
divided by the length of the Hypoteneuse (the side 
opposite the right angle) is the sine of that angle. 
When you use SIN in a program, the angle you are 
using it with must be measured in radians, not 
degrees. 

ATN is one of the trig, functions which computers 
can calculate (see also SIN above). It stands for 
arctangent and it is important to remember that it 
gives an answer in radians, not degrees. You will 
need to use a maths book to find out how this works 
if you do not already know about it. 


STOP tells the computer not to go any further in a 
program. Computers other than the ZX8 1 can use 
END instead. 

PEEK is a way of finding out what is in a specific 
area of the computer’s memory. You need to use it 
with a number which specifies an “address” in the 
memory. 

NB not used on BBC. 

POKE is a special way of putting information in the 
computer’s memory by using a memory “address’. 
NB not used on BBC. 









ASCII chart 


ZX81 code chart 


Code 

number 

ASCII 

character 

Code 

number 

ASCII 

character 

32 

space 

62 

> 

33 

1 

63 

O 

34 

99 

64 

h 

35 

# 

65 

A 

36 

$ 

66 

B 

37 

% 

67 

C 

38 

& 

68 

D 

39 

9 

69 

E 

40 

( 

70 

F 

41 

) 

71 

G 

42 

* 

72 

H 

43 

-h 

73 

I 

44 

9 

74 

J 

45 

— 

75 

K 

46 


76 

L 

47 

/ 

77 

M 

48 

0 

78 

N 

49 

1 • 

79 

O 

50 

2 

80 

P 

51 

3 

81 

0 

52 

4 

82 

R 

53 

5 

83 

S 

54 

6 

84 

T 

55 

7 

85 

U 

56 

8 

86 

V 

57 

9 

87 

W 

58 

J 

88 

X 

59 

1 

89 

Y 

60 

< 

90 

Z 

61 

= 




Code 

number 

ZX81 

character 

Code 

number 

ZX8I 

character 

11 

99 

41 

D 

12 

£ 

42 

E 

13 

$ 

43 

F 

14 

: 

44 

G 

15 

7 

45 

H 

16 

( 

46 

I 

17 

) 

47 

I 

18 

> 

48 

K 

19 

< 

49 

L 

20 

= 

50 

M 

21 

+ 

51 

N 

22 

— 

52 

o 

23 

★ 

53 

p 

24 

/ 

54 

0 

25 

9 

55 

R 

26 

f 

56 

s 

27 

, 

57 

T 

28 

0 

58 

U 

29 

1 

59 

V 

30 

2 

60 

w 

31 

3 

61 

X 

32 

4 

62 

Y 

33 

5 

63 

Z 

34 

6 



35 

7 



36 

8 



37 

9 



38 

A 



39 

B 



40 

C 




Chart of screen sizes 



Max. number of 

Max. number of 


characters across 

lines down 


(or number of columns) 

(or number of rows) 

VIC 20 

22 

23 

TRS-80 

64 

16 

BBC 

20/40/80 

16/24/32 

ZX81 

32 

22 

ZX Spectrum 

32 

22 

Apple 

40 

25 


45 


Conversion chart 

This quick reference chart shows some of the variations in the BASIC used by the machines in this book. It does 
not include instructions for graphics, sound or colour as these vary so enormously from machine to machine. 
Note also that although most computers (except the BBC) use PEEK and POKE, they do not use the samesystem 
of memory addresses, so the numbers used with PEEK and POKE must be changed for each computer. 



BBC 

VIC/Pet 

Apple 

TRS-80 

ZX Spectrum 

ZX81 

Select random 
number between 0 
and 0.99999999 

RND(l) 

RND(l) 

RND(l) 

RND(O) 

RND 

RND 

Select random 
number between 1 
andN 

RND(N) 

RND(1)*N+1 

RND(1)*N+1 

RND(N) 

RND*N+1 

RND*N+1 

Select random letter 
between A and Z 

CHR$(RND(26)+64) 

CHR$(INT(RND(1) 

*26+65)) 

CHR$(INT(RND(1) 
*26+ 65)) 

CHR$(RND(26)+64) 

CHRS!INT!RND*26+65)) 

CHR$!INT!RND*26 + 38)) 

Clear screen 

CLS 

PRINT CHR$( 147) 

HOME 

CLS 

CLS 

CLS 

Check keyboard to 
see if key being 
pressed 

INKEY$(N) 

GETXS 

X$=“ ” 

IF PEEK(- 16384) 
>127 THEN GET X$ 

INKEYS 

INKEYS 

INKEYS 

Convert characters 
into code numbers 

ASC(“X”) 

(using ASCII code) 

ASC(“X”) 

(using ASCII code) 

ASC(“X”) 

(using ASCII code) 

ASC(“X”) 

(using ASCII code) 

CODE(“X”) 

(using ASCII code) 

CODE(“X”) 

(using ZX8 1 code) 

Move cursor up 

PRINT CHR$( 11) 

PRINT CHR$( 145) 

CALL -998 

PRINT CHR$(27) 

PRINT CHRS! 11) 

PRINT CHRS! 112) 

Move cursor down 

PRINT CHR$( 10) 

PRINT CHR$( 17) 

PRINT CHR$( 10) 

PRINT CHR$(26) 

PRINT CHRS! 10) 

PRINT CHRS! 113) 

Move cursor left 

PRINT CHR$(8) 

PRINT CHR$( 157) 

PRINT CHR$(8) 

PRINT CHR$(24) 

PRINT CHRS!8) 

PRINT CHRS! 114) 

Move cursor right 

PRINT CHR$(9) 

PRINT CHR$(29) 

PRINT CHR$(21) 

PRINT CHR$(25) 

PRINT CHR$(9) 

PRINT CHRS! 115) 

Take IstN 
characters of string 

LEFT$(A$,N) 

LEFT$(A$,N) 

LEFT$(A$,N) 

LEFTS! AS, N) 

AS! 1 TON) 

AS! 1 TON) 

Take last N 
characters of string 

RIGHT$(A$,N) 

RIGHT$(A$,N) 

RIGHT$(A$,N) 

RIGHTS! AS, N) 

AS!NTO ) 

A$!NTO ) 

Take middle N 
characters of string 

MID$(A$,N1,N2) 

MID$(A$,N1,N2) 

MID$(A$,N1,N2) 

MIDS!A$,N1,N2) 

AS!NlTON2) 

A$(N1T0N2) 


Answers 

You may find that your answers to 
some of the puzzles are different to 
the ones given here. As long as they 
work on your computer then this 
doesn’t really matter, but check to 
see if they are as neat and simple as 
the answers in the book. 

Pages 

Robot Missile 

Line 90 tells the computer how many 
times to loop round and get a guess 
from you. So, for more chances of 
guessing the secret code letter, 
change the last number in line 90 to a 
higher one. For less chcuices, change 
it to a lower one. 


Page 11 

Desert Tank Battle 

Add the following lines to the program 
to add the possibility of the robots 
seeing you: 

175 IF RND<.05 THEN GOTO 250 

250 PRINT “THEY’VE SEEN YOU-AAGGGHHHH" 

2&0 STOP 

Change the RND in line 175 to the 
version your computer needs. You can 
change .05 to any number between 0 
and 0.999, but remember that the 
higher the number you put here the 
greater the chance of the robots 
seeing you. 


Page? 

The Vital Message 


Page 13 

Battle at Traitor's Castle 


In this program, lines 150 and 160 are a 
“delay” loop. They make the computer 
do nothing for a certciin length of time 
before going on to the next instruction 
in the program which is to clear the 
message off the screen. To make the s 
message stay on the screen longer, 
you need to make the computer loop 
round more times. You can do this by 
changing the last number in line 150 to 
a higher one. 


This is a difficult puzzle, so don’t worry 
if you couldn’t do it. Try out the answer 
anyway. Add these lines to get the two 
targets. 

55 LET P=INT(RNIK.5>«4-i-i 
ZX57 LET P*=CHR*(P+51) 

IA«57 LET P»=CHR*(P+78> 

70 IF L=T THEN LET R«=R«-^P« 

180 LET S=S+P 


Page 15 
Robot Invaders 


Pages 

Shootout 

To make it possible for the computer 
to miss too, add the following lines in 
addition to those in the ‘Making the 
game harder” box. 


You can get 100 points for U, V, W, X or 
Y and 10 points for the others by 
making these changes. 

220 LET H=H+10 

225 IF P»>"T" AND P*<"Z" THEN LET 
H=H+90 


155 IF RND<.1 THEN GOTO 250 
250 PRINT “HE SHOOTS BUT MISSES” 
260 GOTO 90 

Line 155 may need RND( 1) or RND(O), 
depending on your computer. 


Page 17 

Secret Weapon 

You can add the scoring system in the 47 


puzzle by putting these extra lines into 
the progieim. 

15 LET S=0 

145 IF Z<»3 THEN LET S=S+1 
190 GOTO 217 
215 LET S=S+10 

217 PRINT "YOU SCORED "jS|" POINTS" 


Page 19 
Escape! 

This is the simplest way to add three 
robots to the game, though it makes 
the game rather difficult to win. 

22 FOR R=1 TO 3 
25 PRINT "ROBOT “;R 
300 NEXT R 
310 STOP 


Page 21 

Pirate Dogfight 

To make your chance of hitting the 
pirate equcil to his chance of hitting 
you, change the .7 in line 290 to .5. 


Page 23 

Supersonic Bomber 

To get more targets each time, change 
the 5 in lines 30, 70 and 120 to ahigher 
number. You must put the same 
number in all three lines. 


Page 25 
Iceberg 

You can make the grid bigger by 
changing all the 8s in lines 20, 50, 70, 
80, no, 120, 160, 170, 290 and 310 toa 
bigger number. (Use the same 
number each time.) 

To add more icebergs change the 4 
in line 30 to a higher number. 


Going further 

Here is a list of books you should 
find useful if you want to find out 
more about computers or writing 
programs. 

Usbome Guide to Computers by 
Brian Reffin Smith, Usbome 
Understanding the Micro by 
Judy Tatchell and Bill Bennett, 
Usbome 

Introduction to Computer 
Programming by Brian Reffin 
Smith, Usbome 
Illustrating BASIC by Donald 
Alcock, Cambridge University 
Press 

Fred Learns about Computers, 
Macdonald & Evans 
The BASIC Handbook by David 
A. Lien, Compusoft Publishing 
The Computer Book by Robin 
Bradbeer et al, BBC Publications 


First published in 1982 by 
Usbome Publishing Ltd, 20 
Geurick Street, London WC2E 
9BJ, England. 

© 1982 Usbome Publishing Ltd 
The name Usbome and the 
device are Trade marks of 
Usbome Publishing Ltd. 

All rights reserved. No part of 
this publication may be 
reproduced, stored in a retrieval 
system or transmitted in any form 
or by any means, electronic, 
mechaniced, photocopying, 
recording or otherwise, without 
the prior permission of the 
publisher. 


Printed in Spain by 
ELEXPURU, S. A. L- Bilbao 
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— Usborne Computer Programs — 

Each of these colouxfhl new books contains 14 simple gcunes programs to 
play on a microcomputer.* Alongside the programs there are 
explanations of how they work and puzzles and suggestions for ways of 
changing them. Through playing these games even complete beginners 
will quickly begin to understand how a simple program works and be 
itching to write their own. There are tips and hints on writing programs 
and a summary of BASIC at the back of each book and also a chart which 
wiU help you convert progrcuns in magazines and other books to work on 
your micro. 

*The programs in these books are suitable for use on the following 
micros: ZX81, BBC, TRS-80, VIC 20, Pet, Apples which use Palsoft BASIC 
and ZX Spectrum. 


Other Computer Titles 


A colonrful guide to 
microcomputers, how 
they work and what they 
can do, with lots of ideas 
for things you can do 
with a micro. 


A step-by-step guide to 
programming in BASIC 
for absolute beginners^ 
With lots of programs to 
run on any 
microcomputer. 


A colourful look at how 
computers play Space 
Invaders, chess and 
other games, with lots of 
tips on how to beat the 
computer. 


Published in Canada by Hayes Publishing Ltd, 3312 Mainway, Burlington, Ontario, Canada, L7M1A7. 
Publish^ in the USA by Hayes Boolcs, 4235 South Memorial Drive, Tulsa, Oklahoma, USA. 


ISBN 0 86020 685 8 


Printed in Spain by ELEXPURU, S. A. L — Bilbao 



